home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / The World of Computer Software.iso / ra-scrs.zip / RA-DFILE.RS < prev    next >
Text File  |  1992-10-30  |  729b  |  32 lines
  1. TITLE "Remote Access BBS file download"
  2. PARAMETER 1 "Enter the filename to download"
  3. ENDPARAMS
  4.  
  5. SEND "|"
  6. WHEN "Files Menu Select"             SEND "D|"
  7. WHEN "Protocol"                      SEND "Z|"
  8. WHEN "(S)tart transfer"              SEND "S|"
  9.  
  10. ;goto file menu
  11. WAITFOR "Main Menu Select"   FAILURE GOTO ERROR
  12. SEND "f|"
  13.  
  14. WAITFOR "to download:"  FAILURE GOTO ERROR
  15. SEND "%P1%|"
  16.  
  17. WAITFOR "Start receiving"  FAILURE GOTO ERROR
  18. DOWNLOAD "%DLDIR%" USING "ROBORZ"
  19.  
  20. ;navigate back to the Main Menu
  21. MESSAGE "Navigating back to Main Menu"
  22. WAITFOR "Files Menu Select"  FAILURE GOTO ERROR
  23. SEND "+|"
  24.  
  25. WAITFOR "Main Menu Select"  FAILURE GOTO ERROR
  26. EXIT 0
  27.  
  28. :ERROR
  29. MESSAGE "!!!SOMETHING WENT WRONG!!!"
  30. EXIT 1
  31.  
  32.